home *** CD-ROM | disk | FTP | other *** search
/ The Disc - MacWorld 1995 / PowerComputing (The Disc)(MacWorld 1995).ISO / pc / cdfactor / hcfactor / hcode.exe / hcode.DXR / 00063_introMouseDownScript.ls < prev    next >
Encoding:
Text File  |  1995-07-14  |  454 b   |  24 lines
  1. global gIntroMovieFlag, theQTMovie
  2.  
  3. on introMouseDownScript
  4.   if frame() = 3 then
  5.     repeat while the stillDown
  6.     end repeat
  7.     if gIntroMovieFlag then
  8.       QTPlay(theQTMovie)
  9.       set gIntroMovieFlag to 0
  10.     else
  11.       QTPause(theQTMovie)
  12.       QTDispose(theQTMovie)
  13.       go("introPause")
  14.     end if
  15.   else
  16.     if frame() > 3 then
  17.       repeat while the stillDown
  18.       end repeat
  19.       go("StartMode")
  20.     end if
  21.   end if
  22.   dontPassEvent()
  23. end
  24.